unit spr_Improvement;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, shbl_Directory, DBGridEhGrouping, PropFilerEh, DB, FIBDataSet,
  XLSExportComp, PropStorageEh, FIBDatabase, pFIBDatabase, ExtCtrls,
  pFIBDataSet, ActnList, Buttons, GridsEh, DBGridEh, StdCtrls, ComCtrls,
  ToolWin, Mask, DBCtrlsEh;

type
  TsprImprovement = class(TshblDirectory)
    dsReferID: TFIBIntegerField;
    dsReferNAME: TFIBStringField;
    dsReferNOTE: TFIBStringField;
    dbeID: TDBEditEh;
    dbeName: TDBEditEh;
    dbeNote: TDBEditEh;
    Label1: TLabel;
    Label2: TLabel;
    Label3: TLabel;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  sprImprovement: TsprImprovement;

implementation

{$R *.dfm}

end.
